require(ggplot2)
source("qqman.r")
mydata=read.table("outfile_result_snp_loc", header=TRUE)
pdf("manhattan.pdf")
manhattan(mydata,annotate=T,pch=".")
dev.off()

